/************************************************************************************
* Title: equivalence_testing.do
* Created by: Jac M. Larner
* Created on: 07/01/24
* Last modified on: 14/06/24
* Last modified by: Jac Larner
* Purpose: This .do file generates the summary stats required to run equiavelence testing for paper "Vulnerability Appeals in the COVID-19 Pandemic: Insights from a National Survey Experiment" by Jac M. Larner and Joshua R. Thorp. These numbers were inputted into the R script 'equivalence_testing.R' Note, this do.file requires that you run 'main_analysis.do' first to generate and code necessary varibales

*************************************************************************************/

* Table 9 (appendix) Disability Treatment
gen group1=.
replace group1=0 if treatment==1
replace group1=1 if treatment==2

sum w3_grid_a1 if group1==0 [aw=w3_W8]
sum w3_grid_a1 if group1==1 [aw=w3_W8]
sum w3_grid_b1 if group1==0 [aw=w3_W8]
sum w3_grid_b1 if group1==1 [aw=w3_W8]
sum w3_grid_c1 if group1==0 [aw=w3_W8]
sum w3_grid_c1 if group1==1 [aw=w3_W8]
sum w3_grid_d1 if group1==0 [aw=w3_W8]
sum w3_grid_d1 if group1==1 [aw=w3_W8]
sum w3_grid_e1 if group1==0 [aw=w3_W8]
sum w3_grid_e1 if group1==1 [aw=w3_W8]
sum w3_grid_f1 if group1==0 [aw=w3_W8]
sum w3_grid_f1 if group1==1 [aw=w3_W8]
sum prosocial_index if group1==0 [aw=w3_W8]
sum prosocial_index if group1==1 [aw=w3_W8]
sum affective_index if group1==0 [aw=w3_W8]
sum affective_index if group1==1 [aw=w3_W8]


* Table 10 (appendix) Ethnic Minority Treatment
gen group2=.
replace group2=0 if treatment==1
replace group2=1 if treatment==3

sum w3_grid_a1 if group2==0 [aw=w3_W8]
sum w3_grid_a1 if group2==1 [aw=w3_W8]
sum w3_grid_b1 if group2==0 [aw=w3_W8]
sum w3_grid_b1 if group2==1 [aw=w3_W8]
sum w3_grid_c1 if group2==0 [aw=w3_W8]
sum w3_grid_c1 if group2==1 [aw=w3_W8]
sum w3_grid_d1 if group2==0 [aw=w3_W8]
sum w3_grid_d1 if group2==1 [aw=w3_W8]
sum w3_grid_e1 if group2==0 [aw=w3_W8]
sum w3_grid_e1 if group2==1 [aw=w3_W8]
sum w3_grid_f1 if group2==0 [aw=w3_W8]
sum w3_grid_f1 if group2==1 [aw=w3_W8]
sum prosocial_index if group2==0 [aw=w3_W8]
sum prosocial_index if group2==1 [aw=w3_W8]
sum affective_index if group2==0 [aw=w3_W8]
sum affective_index if group2==1 [aw=w3_W8]

* Table 11 (appendix) Combined treatment
gen group3=.
replace group3=0 if treatment==1
replace group3=1 if treatment==4

sum w3_grid_a1 if group3==0 [aw=w3_W8]
sum w3_grid_a1 if group3==1 [aw=w3_W8]
sum w3_grid_b1 if group3==0 [aw=w3_W8]
sum w3_grid_b1 if group3==1 [aw=w3_W8]
sum w3_grid_c1 if group3==0 [aw=w3_W8]
sum w3_grid_c1 if group3==1 [aw=w3_W8]
sum w3_grid_d1 if group3==0 [aw=w3_W8]
sum w3_grid_d1 if group3==1 [aw=w3_W8]
sum w3_grid_e1 if group3==0 [aw=w3_W8]
sum w3_grid_e1 if group3==1 [aw=w3_W8]
sum w3_grid_f1 if group3==0 [aw=w3_W8]
sum w3_grid_f1 if group3==1 [aw=w3_W8]
sum prosocial_index if group3==0 [aw=w3_W8]
sum prosocial_index if group3==1 [aw=w3_W8]
sum affective_index if group3==0 [aw=w3_W8]
sum affective_index if group3==1 [aw=w3_W8]










































				